﻿

Public Class UIBase
    Inherits Windows.Forms.Form

    Private _eventoActual As Integer = vbNull

    Enum Eventos
        BUSQUEDA = 1
        CREACION = 2
        MODIFICACION = 3
        ELIMINACION = 4
        CANCELAR = 5
        CARGA_INICIAL = 6
    End Enum

    Property EventoActual() As Eventos
        Get
            Return Me._eventoActual
        End Get
        Set(value As Eventos)
            Me._eventoActual = value
        End Set
    End Property


#Region "Seccion para validaciones de entrada de datos por parte del usuario"

    Public Function validarInput() As Boolean
        Throw New NotImplementedException("Operacion no implementada")
    End Function

#End Region

    Private Sub InitializeComponent()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(UIBase))
        Me.SuspendLayout()
        '
        'UIBase
        '
        Me.ClientSize = New System.Drawing.Size(284, 261)
        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
        Me.MaximizeBox = False
        Me.MinimizeBox = False
        Me.Name = "UIBase"
        Me.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.ResumeLayout(False)

    End Sub

End Class

